home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 43 / Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso / -serious- / graphics / fxforge / create / chaosgradient next >
Text File  |  1999-06-15  |  1KB  |  43 lines
  1. Filter Factory Plugin Information:
  2.  
  3. FILENAME: CHAOSGRA.8BF
  4.  
  5. CATEGORY: 
  6. Harry's Power Grads
  7.  
  8. TITLE:    
  9. Chaos Gradients 1.1
  10.  
  11. COPYRIGHT:
  12. Copyright ) 1997 by Raverspassion@hotmail.com
  13.  
  14. AUTHOR:   
  15. Harry the Raver
  16.  
  17. Map 0: [Map 0:]
  18. Map 1: [Map 1:]
  19. Map 2: [Map 2:]
  20. Map 3: [Map 3:]
  21.  
  22. Control 0: [Mode 1]
  23. Control 1: [Mode 2]
  24. Control 2: [Mode 3]
  25. Control 3: [Invert]
  26. Control 4: [Control 4:]
  27. Control 5: [Control 5:]
  28. Control 6: [Control 6:]
  29. Control 7: [Control 7:]
  30.  
  31. R=
  32. put(x*255/X,0),put(y*255/X,1),put(m*255/X,2),put(y<=Y/2?d*255/-X:d*255/X,3),put(c2m(x,y)*128/M,4),put(c2d(x,y),5),put(val(0,1,9)==1?get(0):val(0,1,9)==2?get(1):val(0,1,9)==3?get(2):val(0,1,9)==4?get(3):val(0,1,9)==5?get(4):val(0,1,9)==6?get(5):val(0,1,9)==7?get(6):get(7),11),put((get(11)+get(12)+get(13))/3,14),x>0?ctl(3)<128?get(14):255-get(14):127
  33.  
  34. G=
  35. put(scl(d,-512,512,255,0),6),put(val(1,1,9)==1?get(0):val(1,1,9)==2?get(1):val(1,1,9)==3?get(2):val(1,1,9)==4?get(3):val(1,1,9)==5?get(4):val(1,1,9)==6?get(5):val(1,1,9)==7?get(6):get(7),12),x>0?ctl(3)<128?get(14):255-get(14):127
  36.  
  37. B=
  38. put(val(2,1,9)==1?get(0):val(2,1,9)==2?get(1):val(2,1,9)==3?get(2):val(2,1,9)==4?get(3):val(2,1,9)==5?get(4):val(2,1,9)==6?get(5):val(2,1,9)==7?get(6):get(7),13),x>0?ctl(3)<128?get(14):255-get(14):127
  39.  
  40. A=
  41. a
  42.  
  43.